home *** CD-ROM | disk | FTP | other *** search
/ Night Owl - The Best of BBS / Night Owl The Best of BBS (NOP-BBS) (Night Owl Publisher) (1994).iso / 014a / ezbbs215.lha / Data / AlarmSysop next >
Text File  |  1992-12-21  |  650b  |  31 lines
  1. /* Alarm System-Operator */
  2.  
  3. arg eazyport
  4.  
  5. if ~open('eazywin','con:20/'eazyport*20'/400/0/Alarm Sysop, Port #'eazyport'/CLOSE/WAIT','W') then
  6.    exit 20
  7.  
  8. address value 'EAZYBBS.'eazyport
  9.  
  10. options results
  11. 'status' username
  12.  
  13. call writeln 'eazywin', 'User' result 'called you on port' eazyport
  14. call writeln 'eazywin', 'The time is 'date() time()
  15.  
  16. call close 'eazywin'
  17.  
  18. 'write' ".now crying for sysop"
  19.  
  20. address command 'dsound -v10 -l mb:Intern/Scream_SOUND'
  21. address command 'dsound -v10 -r mb:Intern/Explosion_SOUND'
  22.  
  23. 'write' ", done."
  24. 'writeln'
  25.  
  26. 'write' ".mach einfach weiter... der Sysop meldet sich schon, wenn er Zeit hat"
  27. 'writeln'
  28.  
  29. 'quit' script
  30.  
  31.